object Self: TSelf
  Left = 157
  Top = 168
  Width = 485
  Height = 293
  Caption = 'Selftest:  Offline'
  Color = clWhite
  Font.Color = clBlack
  Font.Height = -13
  Font.Name = 'Courier New'
  Font.Style = []
  Menu = MainMenu
  PixelsPerInch = 96
  OnCreate = FormCreate
  TextHeight = 16
  object Memo: TMemo
    Left = 0
    Top = 0
    Width = 477
    Height = 247
    Align = alClient
    Lines.Strings = (
      '')
    ReadOnly = True
    ScrollBars = ssVertical
    TabOrder = 0
    OnKeyPress = KeyPress
  end
  object MainMenu: TMainMenu
    Left = 23
    Top = 66
    object Instructions: TMenuItem
      Caption = 'Instructions'
      OnClick = InstructionsClick
    end
    object menuPort: TMenuItem
      Caption = 'Port'
      object menuCOM1: TMenuItem
        Caption = 'COM1'
        OnClick = menuCOM1Click
      end
      object menuCOM2: TMenuItem
        Caption = 'COM2'
        OnClick = menuCOM2Click
      end
      object menuCOM3: TMenuItem
        Caption = 'COM3'
      end
      object menuCOM4: TMenuItem
        Caption = 'COM4'
        OnClick = menuCOM4Click
      end
    end
    object Test: TMenuItem
      Caption = 'Test'
      OnClick = TestClick
    end
    object menuExit: TMenuItem
      Caption = 'Exit'
      OnClick = menuExitClick
    end
  end
end